COMMENT ⊗   VALID 00004 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	\magnification\magstephalf
C00006 00003	$$\def\boxit#1{\vbox{\hrule\hbox{\vrule\kern3pt
C00007 00004
C00018 ENDMK
C⊗;
\magnification\magstephalf
\input macro.tex
\baselineskip 14pt

$$\vcenter{\baselineskip0pt
\halign{\hfil #\hfil%
&$\hfil #\hfil$\qquad%
&#\hfil%
&\quad\hfil#\hfil\quad%
&\hfil#\hfil\quad%
&\hfil#\hfil\qquad%
&#\hfil%
&#\hfil\qquad%
&#\hfil\qquad%
&#\hfil\cr
&&function&&&&result\cr
FUNCTION&&name =&&&:&type =&\hfill ;&block&;\cr
&&identifier&&&&identifier\cr
\noalign{\bigskip\bigskip}
&&\hfill (&&&)\cr
\noalign{\bigskip}
&&&;\cr
\noalign{\bigskip}
&&&&&&¶meter\cr
&&\qquad parameter =&&&&:&type =\cr
&&\qquad identifier&&&&&identifier\cr
\noalign{\bigskip}
&&&&,\cr
}}$$


\bigskip
\bigskip
\bigskip
\bigskip

$$\vcenter{\baselineskip0pt
\halign{\hfil#\hfil\quad%
&#\hfil\quad%
&#\hfil%
&#\hfil\quad
&#\hfil\quad%
&#\hfil\quad%
&#\hfil\quad%
&#\hfil%
&#\hfil\cr
&&procedure\cr
PROCEDURE&&name =&&&;&&block&\hfill ;\cr
&&identifier\cr
\noalign{\bigskip\bigskip}
&&&\hfill (&&)\cr
\noalign{\bigskip}
&&&&;\cr
\noalign{\bigskip\bigskip}
&VAR&¶meter =&&&\hfill :&&type name =\cr
&&&identifier&&&&&identifier\cr
\noalign{\bigskip\bigskip}
&&&&&,\cr
}}$$

\bye
{\rmn
{\narrower\smallskip\noindent
{\bf Exercise:} 

\noindent
\llap{3210.} Assume $f(x)$ is a function that is negative in some finite
interval that is a subset of $0≤x≤1$. Design an algorithm to find an~$x$
for which $f(x)$ is negative; it should work in principle even if the
interval is extremely small.
\smallskip}
}

\noindent
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it
this is it

\bye



$$\vcenter{\baselineskip0pt
\halign{\ctr{#}&\ctr{#}\qquad&\lft{#}\qquad&\ctr{#}\qquad\qquad%
&\lft{#}\qquad&\ctr{#}\qquad&\ctr{#}\qquad&\lft{#}\qquad&\ctr{#}\cr
&&function&¶meter&&&type\cr
FUNCTION&&identifier&(&identifier&,&:&identifier&;\cr
\noalign{\bigskip\bigskip}
&&type\cr
\quad )&:&identifier&;&block&;\cr}}$$


\bigskip
\bigskip
\bigskip
\bigskip

$$\vcenter{\baselineskip0pt
\halign{\hfil#\hfil\qquad&#\hfil&#\hfil&#\hfil\qquad&#\hfil\qquad\qquad
&\hfil#\hfil\qquad&#\hfil\qquad&\hfil#\hfil\qquad&#\hfil\cr
&&&&procedure\cr
&PROCEDURE&&&identifier\cr
\noalign{\bigskip\bigskip\bigskip}
&&&&&,&&;\cr
$\bullet$&\quad(&&&\qquad parameter&&type&&;\cr
&&&&\qquad identifier&&identifier\cr
&&&&&:&&)\cr
&&VAR\cr
\noalign{\bigskip\bigskip\bigskip}
&block&&;\cr
}}$$

\bye
$$\def\boxit#1{\vbox{\hrule\hbox{\vrule\kern3pt
      \vbox{\kern3pt#1\kern3pt}\kern3pt\vrule}\hrule}}
\setbox4=\vbox{\hsize 23pc \noindent \strut 
\centerline{Rule of Good Programming Practice:}

\noindent {\it Indent the command which is repeated by an iterative
clause, as in the above examples.\/}
\strut}
\boxit{\box4}$$

\bye

A program that writes more than a hundred or so characters
may create an output line which\rlap{ on}
printing falls off the end of the page
like the line above. Some printers will automatically
break such a long line, others will
printing falls off the end of the page
like the line above. Some printers will automatically
break such a long line, others will

\bye
$$\vcenter{\offinterlineskip
\halign{\hfil${#}$\quad&\vrule#&\strut\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil%
&\xskip\hfil #\hfil\xskip&\vrule#\cr
Y =&\omit&1&2&3&4&5&6&7&8&9&10\cr
\noalign{\smallskip}
&\multispan{12}\hrulefill\cr
&height6pt&\multispan{10}&\cr
    X =	1&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
	2&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
	3&&\multispan6&*&*&&&\cr
&height6pt&\multispan{10}&\cr
	4&&\multispan6&*&&&&\cr
&height6pt&\multispan{10}&\cr
	5&&\multispan6&*&&&&\cr
&height6pt&\multispan{10}&\cr
	6&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
	7&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
	8&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
	9&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
       10&&\multispan{10}&\cr
&height6pt&\multispan{10}&\cr
&\multispan{12}\hrulefill\cr
}}$$

\bye

$$\vbox{\tabskip0pt\offinterlineskip
\halign{\strut#&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#\cr
\omit&\multispan{19}\hrulefill\cr
\omit&height2pt&\multispan{17}&\cr
&&\phantom{1}&\omit&\phantom{2}&\omit&\phantom{3}%
&\omit&\phantom{4}&\omit&\phantom{5}&\omit&\phantom{6}&\omit&\phantom{7}%
&\omit&\phantom{8}&\omit&\phantom{9}&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\multispan3\hrulefill%
&\multispan7&\cr
\omit&height2pt&&&&&&\omit&&&&&&\multispan6&\cr
&&&&&&&\omit&&&&&&\multispan6&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\multispan3\hrulefill%
&&\omit&&\omit&&\omit&&\cr
\omit&height2pt&\multispan{17}&\cr
&&&\multispan{16}&\cr
\omit&&&\multispan6&\multispan3\hrulefill&&\omit%
&&\multispan3\hrulefill&&\cr
\omit&height2pt&\multispan6&&&&&&\omit&&&&&&\cr
&&&\multispan5&&&&&&\omit&&&&&&\cr
\omit&&&\multispan6&\multispan3\hrulefill&&\omit&&&&&&\cr
\omit&height2pt&\multispan{12}&&&&&&\cr
&&\multispan{12}&&&&&&\cr
\omit&&\multispan{12}&&\multispan3\hrulefill&&\cr
\omit&height2pt&\multispan{17}&\cr
&&\multispan{17}&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\omit&&\multispan3\hrulefill%
&&\omit&&\omit&&\cr
\omit&height2pt&&&&&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
&&&&&&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\omit&&&&\omit&&\omit&&\omit&&\cr
\omit&height2pt&\multispan8&&&&&&\omit&&\omit&&\cr
&&\multispan8&&&&&&\omit&&\omit&&\cr
\omit&\multispan{19}\hrulefill\cr
}}$$


\bigskip

$$\vbox{\tabskip0pt\offinterlineskip
\halign{\strut#&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#&$\;$\hfil #\hfil$\;$%
&\vrule#\cr
\omit&\multispan{19}\hrulefill\cr
\omit&height2pt&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
&&\phantom{1}&\omit&\phantom{2}&\omit&\phantom{3}%
&\omit&\phantom{4}&\omit&\phantom{5}&\omit&\phantom{6}&\omit&\phantom{7}%
&\omit&\phantom{8}&\omit&\phantom{9}&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\multispan3\hrulefill%
&&\omit&&\omit&&\omit&&\cr
\omit&height2pt&&&&&&\omit&&&&&&\omit&&\omit&&\omit&&\cr
&&&&&&&\omit&&&&&&\omit&&\omit&&\omit&&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\multispan3\hrulefill%
&&\omit&&\omit&&\omit&&\cr
\omit&height2pt&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
&&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
%&&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
\omit&&&\omit&&\omit&&\omit&&\multispan3\hrulefill&&\omit%
&&\multispan3\hrulefill&&\cr
\omit&height2pt&&\omit&&\omit&&\omit&&&&&&\omit&&&&&&\cr
&&&\omit&&\omit&&\omit&&&&&&\omit&&&&&&\cr
\omit&&&\omit&&\omit&&\omit&&\multispan3\hrulefill&&\omit&&&&&&\cr
\omit&height2pt&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&&&&&\cr
&&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&&&&&\cr
\omit&&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\multispan3\hrulefill&&\cr
\omit&height2pt&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
&&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\omit&&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\omit&&\multispan3\hrulefill%
&&\omit&&\omit&&\cr
\omit&height2pt&&&&&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
&&&&&&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
\omit&&&\multispan3\hrulefill&&\omit&&\omit&&&&\omit&&\omit&&\omit&&\cr
\omit&height2pt&&\omit&&\omit&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
&&&\omit&&\omit&&\omit&&\omit&&&&&&\omit&&\omit&&\cr
\omit&\multispan{19}\hrulefill\cr
}}$$


\end